www.gusucode.com > 万能超级搜索引擎 8.2 (商业版) > 万能超级搜索引擎 8.2 (商业版)/downcode.com/followtop/admin/htmlgg4.asp
<% set rs=server.createobject("adodb.recordset") sql="select * from adminuser where username like '"&Session("admin")&"' " rs.open sql,conn,1,3 Set Fso1=Server.CreateObject("Scripting.FileSystemObject") '创建fso对象 Set Fout1=Fso1.CreateTextFile(server.mappath("../so/gg4.asp")) Fout1.WriteLine rs("gg4") Fout1.Close rs.close:set rs = nothing %>